home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / COOLVIEW.ZIP / VIEW50_2.ASM < prev    next >
Encoding:
Assembly Source File  |  1995-03-05  |  1.1 KB  |  56 lines
  1. ; View 50-lines screen in Text Mode
  2. ; Coded '95 by Paradise, 1995.III.3
  3. ; Lublin, Poland
  4. ; paradise@bachus.umcs.lublin.pl
  5. ;
  6. ; Example : Include picture into com (or exe) file
  7. ;
  8. ; Need : piccy.m (converted from bin file by BIN2INC.EXE)
  9. ;
  10. ; Compile : tasm view50_2.asm
  11. ;           tlink /t view50_2.obj
  12. ;           pklite view50_2.exe
  13. ;
  14.  
  15. Code  SEGMENT PARA PUBLIC 'CODE'
  16.       ASSUME CS:Code, DS:Code
  17.       Org 100h
  18.  
  19. Body  PROC FAR
  20.       ; set 400 scan lines
  21.       mov ax, 1202h
  22.       mov bl, 30h
  23.       int 10h
  24.       ; set text mode
  25.       mov ax, 3h
  26.       int 10h
  27.       ; load 8x8 font
  28.       mov ax, 1112h
  29.       mov bl, 0
  30.       int 10h
  31.       ; move screen from data
  32.       push cs
  33.       pop ds
  34.       mov si, offset Piccy
  35.       mov dx, 0b800h
  36.       mov es, dx
  37.       xor di, di
  38.       mov cx, 4000
  39.       cld
  40.       rep movsw
  41.       ; wait for keypressed
  42.       mov ah, 0
  43.       int 16h
  44.       ; set 25-lines mode
  45.       mov ax, 3h
  46.       int 10h
  47.       ; return to dos
  48.       mov ah, 4ch
  49.       int 21h
  50. Body  ENDP
  51.  
  52. Piccy LABEL WORD
  53. include piccy.m
  54.  
  55. Code  ENDS
  56.       END Body